home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / dev / amos / AMCAFExa.lha / AMCAF_Examples / Time&Date.AMOS < prev    next >
AMOS Basic Source Code Archive  |  1996-01-17  |  2.2 KB
view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was processed as: AMOS Basic Source Code Archive (archive/amosSrc).

You can browse this item here: Time&Date.AMOS

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert AMOS Basic Source Code Archive (archive/amosSrc) magic Supported
100% file AMOS Basic source code, untested default
99% file data default
50% TrID AMOS source (v1.34 Alt) default
49% TrID AMOS source (generic) default
100% gt2 Kopftext: 'AMOS Basic v134 ' default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 4d 4f 53 20 42 61 73 | 69 63 20 76 31 33 34 20 |AMOS Bas|ic v134 |
|00000010| 00 00 08 a4 1f 01 06 52 | 00 36 20 2a 2a 2a 2a 2a |.......R|.6 *****|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000040| 20 43 6f 6d 6d 61 6e 64 | 73 20 75 73 65 64 3a 20 | Command|s used: |
|00000050| 00 00 28 01 06 52 00 48 | 20 2a 20 20 20 20 20 20 |..(..R.H| *      |
|00000060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 20 3d |        |     * =|
|00000080| 43 75 72 72 65 6e 74 20 | 44 61 74 65 20 20 20 20 |Current |Date    |
|00000090| 20 20 3d 43 75 72 72 65 | 6e 74 20 54 69 6d 65 20 |  =Curre|nt Time |
|000000a0| 00 00 26 01 06 52 00 44 | 20 2a 20 20 20 20 20 20 |..&..R.D| *      |
|000000b0| 20 20 20 20 20 41 6d 63 | 61 66 20 45 78 61 6d 70 |     Amc|af Examp|
|000000c0| 6c 65 73 20 20 20 20 20 | 20 20 20 20 20 2a 20 3d |les     |     * =|
|000000d0| 43 64 20 44 61 74 65 24 | 20 20 20 20 20 20 20 20 |Cd Date$|        |
|000000e0| 20 20 3d 43 74 20 54 69 | 6d 65 24 20 00 00 25 01 |  =Ct Ti|me$ ..%.|
|000000f0| 06 52 00 42 20 2a 20 20 | 20 20 20 20 20 20 20 20 |.R.B *  |        |
|00000100| 54 69 6d 65 20 26 20 44 | 61 74 65 20 56 31 2e 31 |Time & D|ate V1.1|
|00000110| 20 20 20 20 20 20 20 20 | 20 2a 20 3d 43 64 20 59 |        | * =Cd Y|
|00000120| 65 61 72 20 20 20 20 20 | 20 20 20 20 20 20 3d 43 |ear     |      =C|
|00000130| 74 20 48 6f 75 72 00 00 | 26 01 06 52 00 44 20 2a |t Hour..|&..R.D *|
|00000140| 20 20 20 20 20 20 57 72 | 69 74 74 65 6e 20 62 79 |      Wr|itten by|
|00000150| 20 43 68 72 69 73 20 48 | 6f 64 67 65 73 20 20 20 | Chris H|odges   |
|00000160| 20 20 20 2a 20 3d 43 64 | 20 4d 6f 6e 74 68 20 20 |   * =Cd| Month  |
|00000170| 20 20 20 20 20 20 20 20 | 3d 43 74 20 4d 69 6e 75 |        |=Ct Minu|
|00000180| 74 65 00 00 26 01 06 52 | 00 44 20 2a 20 20 20 20 |te..&..R|.D *    |
|00000190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a |        |       *|
|000001b0| 20 3d 43 64 20 44 61 79 | 20 20 20 20 20 20 20 20 | =Cd Day|        |
|000001c0| 20 20 20 20 3d 43 74 20 | 53 65 63 6f 6e 64 00 00 |    =Ct |Second..|
|000001d0| 25 01 06 52 00 42 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |%..R.B *|********|
|000001e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 20 3d 43 64 |********|**** =Cd|
|00000200| 20 57 65 65 6b 64 61 79 | 20 20 20 20 20 20 20 20 | Weekday|        |
|00000210| 3d 43 74 20 54 69 63 6b | 00 00 11 01 06 52 00 1a |=Ct Tick|.....R..|
|00000220| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000230| 20 20 20 20 20 20 20 20 | 20 20 00 00 0f 01 06 52 |        |  .....R|
|00000240| 00 16 20 4f 70 65 6e 20 | 61 20 68 69 72 65 73 20 |.. Open |a hires |
|00000250| 73 63 72 65 65 6e 2e 20 | 00 00 14 01 09 ea 00 3e |screen. |.......>|
|00000260| 00 00 00 00 00 5c 00 3e | 00 00 02 80 00 5c 00 3e |.....\.>|.....\.>|
|00000270| 00 00 01 00 00 5c 00 3e | 00 00 00 02 00 5c 0c 84 |.....\.>|.....\..|
|00000280| 00 00 11 01 14 46 00 54 | 0d 34 00 54 13 dc 00 3e |.....F.T|.4.T...>|
|00000290| 00 00 00 00 00 54 13 d2 | 00 3e 00 00 00 01 00 54 |.....T..|.>.....T|
|000002a0| 0b ae 00 00 0a 01 0c fc | 00 3e 00 00 00 00 00 5c |........|.>.....\|
|000002b0| 00 36 00 00 0f ff 00 00 | 10 01 06 52 00 18 20 50 |.6......|...R.. P|
|000002c0| 72 69 6e 74 20 73 6f 6d | 65 20 73 69 6c 6c 79 20 |rint som|e silly |
|000002d0| 74 69 74 6c 65 20 00 00 | 14 01 13 e8 00 26 00 1e |title ..|.....&..|
|000002e0| 41 4d 43 41 46 20 74 69 | 6d 65 20 61 6e 64 20 64 |AMCAF ti|me and d|
|000002f0| 61 74 65 20 66 75 6e 63 | 74 69 6f 6e 73 2e 00 00 |ate func|tions...|
|00000300| 0f 01 06 52 00 16 20 47 | 65 74 20 74 68 65 20 63 |...R.. G|et the c|
|00000310| 75 72 72 65 6e 74 20 64 | 61 74 65 20 00 00 0b 01 |urrent d|ate ....|
|00000320| 00 06 00 00 04 00 64 61 | 74 65 ff a2 00 4e 08 00 |......da|te...N..|
|00000330| 07 ce 00 00 2a 01 06 52 | 00 4c 20 47 69 76 65 20 |....*..R|.L Give |
|00000340| 6f 75 74 20 61 6c 6c 20 | 64 61 74 65 20 69 6e 66 |out all |date inf|
|00000350| 6f 72 6d 61 74 69 6f 6e | 73 2e 20 54 68 65 73 65 |ormation|s. These|
|00000360| 20 68 61 76 65 20 6f 6e | 6c 79 20 74 6f 20 62 65 | have on|ly to be|
|00000370| 20 70 72 69 6e 74 65 64 | 20 6f 6e 63 65 2c 20 62 | printed| once, b|
|00000380| 65 63 61 75 73 65 00 00 | 1a 01 06 52 00 2c 20 49 |ecause..|...R., I|
|00000390| 20 74 68 69 6e 6b 20 79 | 6f 75 20 64 6f 6e 27 74 | think y|ou don't|
|000003a0| 20 72 75 6e 20 69 74 20 | 61 6c 6c 20 64 61 79 20 | run it |all day |
|000003b0| 6c 6f 6e 67 20 3a 29 29 | 29 20 00 00 0a 01 13 78 |long :))|) .....x|
|000003c0| 00 3e 00 00 00 00 00 5c | 00 3e 00 00 00 02 00 00 |.>.....\|.>......|
|000003d0| 1e 01 04 76 00 26 00 18 | 43 75 72 72 65 6e 74 20 |...v.&..|Current |
|000003e0| 64 61 74 65 20 61 73 20 | 68 65 78 20 20 20 3a 20 |date as |hex   : |
|000003f0| 00 64 05 c4 00 74 00 06 | 00 00 04 00 64 61 74 65 |.d...t..|....date|
|00000400| 00 5c 00 3e 00 00 00 08 | 00 7c 00 00 1c 01 04 76 |.\.>....|.|.....v|
|00000410| 00 26 00 18 43 75 72 72 | 65 6e 74 20 64 61 74 65 |.&..Curr|ent date|
|00000420| 20 61 73 20 73 74 72 69 | 6e 67 3a 20 00 64 00 4e | as stri|ng: .d.N|
|00000430| 08 00 0f 0a 00 74 00 06 | 00 00 04 00 64 61 74 65 |.....t..|....date|
|00000440| 00 7c 00 00 1c 01 04 76 | 00 26 00 17 43 75 72 72 |.|.....v|.&..Curr|
|00000450| 65 6e 74 20 79 65 61 72 | 20 20 20 20 20 20 20 20 |ent year|        |
|00000460| 20 20 3a 00 00 64 00 4e | 08 00 07 f2 00 74 00 06 |  :..d.N|.....t..|
|00000470| 00 00 04 00 64 61 74 65 | 00 7c 00 00 25 01 04 76 |....date|.|..%..v|
|00000480| 00 26 00 18 43 75 72 72 | 65 6e 74 20 6d 6f 6e 74 |.&..Curr|ent mont|
|00000490| 68 20 20 20 20 20 20 20 | 20 20 3a 20 00 64 00 4e |h       |  : .d.N|
|000004a0| 08 00 0e b8 00 74 00 4e | 08 00 08 00 00 74 00 06 |.....t.N|.....t..|
|000004b0| 00 00 04 00 64 61 74 65 | 00 7c 00 5c 00 3e 00 00 |....date|.|.\.>..|
|000004c0| 00 02 00 7c 00 00 25 01 | 04 76 00 26 00 18 43 75 |...|..%.|.v.&..Cu|
|000004d0| 72 72 65 6e 74 20 64 61 | 79 20 20 20 20 20 20 20 |rrent da|y       |
|000004e0| 20 20 20 20 3a 20 00 64 | 00 4e 08 00 0e b8 00 74 |    : .d|.N.....t|
|000004f0| 00 4e 08 00 08 10 00 74 | 00 06 00 00 04 00 64 61 |.N.....t|......da|
|00000500| 74 65 00 7c 00 5c 00 3e | 00 00 00 02 00 7c 00 00 |te.|.\.>|.....|..|
|00000510| 25 01 04 76 00 26 00 18 | 43 75 72 72 65 6e 74 20 |%..v.&..|Current |
|00000520| 77 65 65 6b 64 61 79 20 | 20 20 20 20 20 20 3a 20 |weekday |      : |
|00000530| 00 64 00 4e 08 00 0e b8 | 00 74 00 4e 08 00 08 1e |.d.N....|.t.N....|
|00000540| 00 74 00 06 00 00 04 00 | 64 61 74 65 00 7c 00 5c |.t......|date.|.\|
|00000550| 00 3e 00 00 00 02 00 7c | 00 00 1a 01 06 52 00 2c |.>.....||.....R.,|
|00000560| 20 50 72 65 70 72 69 6e | 74 20 74 68 65 20 69 6e | Preprin|t the in|
|00000570| 66 6f 72 6d 61 74 69 6f | 6e 20 74 68 61 74 20 64 |formatio|n that d|
|00000580| 6f 6e 27 74 20 63 68 61 | 6e 67 65 2e 00 00 1a 01 |on't cha|nge.....|
|00000590| 13 78 00 3e 00 00 00 28 | 00 5c 00 3e 00 00 00 02 |.x.>...(|.\.>....|
|000005a0| 00 54 04 76 00 26 00 18 | 43 75 72 72 65 6e 74 20 |.T.v.&..|Current |
|000005b0| 74 69 6d 65 20 61 73 20 | 68 65 78 20 20 20 3a 20 |time as |hex   : |
|000005c0| 00 00 1a 01 13 78 00 3e | 00 00 00 28 00 5c 00 3e |.....x.>|...(.\.>|
|000005d0| 00 00 00 03 00 54 04 76 | 00 26 00 18 43 75 72 72 |.....T.v|.&..Curr|
|000005e0| 65 6e 74 20 74 69 6d 65 | 20 61 73 20 73 74 72 69 |ent time| as stri|
|000005f0| 6e 67 3a 20 00 00 1a 01 | 13 78 00 3e 00 00 00 28 |ng: ....|.x.>...(|
|00000600| 00 5c 00 3e 00 00 00 04 | 00 54 04 76 00 26 00 18 |.\.>....|.T.v.&..|
|00000610| 43 75 72 72 65 6e 74 20 | 68 6f 75 72 20 20 20 20 |Current |hour    |
|00000620| 20 20 20 20 20 20 3a 20 | 00 00 1a 01 13 78 00 3e |      : |.....x.>|
|00000630| 00 00 00 28 00 5c 00 3e | 00 00 00 05 00 54 04 76 |...(.\.>|.....T.v|
|00000640| 00 26 00 18 43 75 72 72 | 65 6e 74 20 6d 69 6e 75 |.&..Curr|ent minu|
|00000650| 74 65 20 20 20 20 20 20 | 20 20 3a 20 00 00 1a 01 |te      |  : ....|
|00000660| 13 78 00 3e 00 00 00 28 | 00 5c 00 3e 00 00 00 06 |.x.>...(|.\.>....|
|00000670| 00 54 04 76 00 26 00 18 | 43 75 72 72 65 6e 74 20 |.T.v.&..|Current |
|00000680| 73 65 63 6f 6e 64 20 20 | 20 20 20 20 20 20 3a 20 |second  |      : |
|00000690| 00 00 1a 01 13 78 00 3e | 00 00 00 28 00 5c 00 3e |.....x.>|...(.\.>|
|000006a0| 00 00 00 07 00 54 04 76 | 00 26 00 18 43 75 72 72 |.....T.v|.&..Curr|
|000006b0| 65 6e 74 20 74 69 63 6b | 20 20 20 20 20 20 20 20 |ent tick|        |
|000006c0| 20 20 3a 20 00 00 04 01 | 02 50 00 00 00 00 03 03 |  : ....|.P......|
|000006d0| 23 d0 00 00 0f 03 06 52 | 00 16 20 47 65 74 20 74 |#......R|.. Get t|
|000006e0| 68 65 20 63 75 72 72 65 | 6e 74 20 74 69 6d 65 20 |he curre|nt time |
|000006f0| 00 00 0b 03 00 06 00 00 | 04 00 74 69 6d 65 ff a2 |........|..time..|
|00000700| 00 4e 08 00 07 e0 00 00 | 14 03 06 52 00 20 20 47 |.N......|...R.  G|
|00000710| 69 76 65 20 6f 75 74 20 | 61 6c 6c 20 74 69 6d 65 |ive out |all time|
|00000720| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 73 20 00 00 | informa|tions ..|
|00000730| 18 03 13 78 00 3e 00 00 | 00 40 00 5c 00 3e 00 00 |...x.>..|.@.\.>..|
|00000740| 00 02 00 54 04 76 05 c4 | 00 74 00 06 00 00 04 00 |...T.v..|.t......|
|00000750| 74 69 6d 65 00 5c 00 3e | 00 00 00 08 00 7c 00 00 |time.\.>|.....|..|
|00000760| 16 03 13 78 00 3e 00 00 | 00 40 00 5c 00 3e 00 00 |...x.>..|.@.\.>..|
|00000770| 00 03 00 54 04 76 00 4e | 08 00 0f 1a 00 74 00 06 |...T.v.N|.....t..|
|00000780| 00 00 04 00 74 69 6d 65 | 00 7c 00 00 1f 03 13 78 |....time|.|.....x|
|00000790| 00 3e 00 00 00 40 00 5c | 00 3e 00 00 00 04 00 54 |.>...@.\|.>.....T|
|000007a0| 04 76 00 4e 08 00 0e b8 | 00 74 00 4e 08 00 08 30 |.v.N....|.t.N...0|
|000007b0| 00 74 00 06 00 00 04 00 | 74 69 6d 65 00 7c 00 5c |.t......|time.|.\|
|000007c0| 00 3e 00 00 00 02 00 7c | 00 00 1f 03 13 78 00 3e |.>.....||.....x.>|
|000007d0| 00 00 00 40 00 5c 00 3e | 00 00 00 05 00 54 04 76 |...@.\.>|.....T.v|
|000007e0| 00 4e 08 00 0e b8 00 74 | 00 4e 08 00 08 3e 00 74 |.N.....t|.N...>.t|
|000007f0| 00 06 00 00 04 00 74 69 | 6d 65 00 7c 00 5c 00 3e |......ti|me.|.\.>|
|00000800| 00 00 00 02 00 7c 00 00 | 1f 03 13 78 00 3e 00 00 |.....|..|...x.>..|
|00000810| 00 40 00 5c 00 3e 00 00 | 00 06 00 54 04 76 00 4e |.@.\.>..|...T.v.N|
|00000820| 08 00 0e b8 00 74 00 4e | 08 00 08 4e 00 74 00 06 |.....t.N|...N.t..|
|00000830| 00 00 04 00 74 69 6d 65 | 00 7c 00 5c 00 3e 00 00 |....time|.|.\.>..|
|00000840| 00 02 00 7c 00 00 1f 03 | 13 78 00 3e 00 00 00 40 |...|....|.x.>...@|
|00000850| 00 5c 00 3e 00 00 00 07 | 00 54 04 76 00 4e 08 00 |.\.>....|.T.v.N..|
|00000860| 0e b8 00 74 00 4e 08 00 | 08 5e 00 74 00 06 00 00 |...t.N..|.^.t....|
|00000870| 04 00 74 69 6d 65 00 7c | 00 5c 00 3e 00 00 00 02 |..time.||.\.>....|
|00000880| 00 7c 00 00 11 01 02 5c | 00 f2 ff a2 05 52 00 74 |.|.....\|.....R.t|
|00000890| 00 3e 00 00 00 1b 00 7c | ff 4c 1e 32 ff 66 00 3e |.>.....||.L.2.f.>|
|000008a0| 00 00 00 00 00 00 06 01 | 0a 04 00 3e 00 00 00 00 |........|...>....|
|000008b0| 00 00 03 01 03 b6 00 00 | 41 6d 42 73 00 00       |........|AmBs..  |
+--------+-------------------------+-------------------------+--------+--------+